home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 July: Mac OS SDK / Dev.CD Jul 99 SDK1.toast / Development Kits / Mac OS / Interfaces&Libraries / Universal / Interfaces / AIncludes / OCEMessaging.a < prev    next >
Encoding:
Text File  |  1998-08-17  |  41.1 KB  |  1,310 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        OCEMessaging.a
  3. ;
  4. ;    Contains:    Apple Open Collaboration Environment Messaging Interfaces.
  5. ;
  6. ;    Version:    Technology:    AOCE Toolbox 1.02
  7. ;                Release:    Universal Interfaces 3.2
  8. ;
  9. ;    Copyright:    © 1994-1998 by Apple Computer, Inc., all rights reserved.
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__OCEMESSAGING__') = 'UNDEFINED' THEN
  18. __OCEMESSAGING__ SET 1
  19.  
  20.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  21.     include 'Files.a'
  22.     ENDIF
  23.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  24.     include 'MacTypes.a'
  25.     ENDIF
  26.  
  27.     IF &TYPE('__DIGITALSIGNATURE__') = 'UNDEFINED' THEN
  28.     include 'DigitalSignature.a'
  29.     ENDIF
  30.     IF &TYPE('__OCE__') = 'UNDEFINED' THEN
  31.     include 'OCE.a'
  32.     ENDIF
  33.     IF &TYPE('__OCEAUTHDIR__') = 'UNDEFINED' THEN
  34.     include 'OCEAuthDir.a'
  35.     ENDIF
  36.  
  37. ; *****************************************************************************
  38. ;  Definitions common to OCEMessaging and to OCEMail. These relate to addressing,
  39. ;message ids and priorities, etc. 
  40.  
  41. ;  Values of IPMPriority 
  42.  
  43. kIPMAnyPriority                    EQU        0                    ; FOR FILTER ONLY 
  44. kIPMNormalPriority                EQU        1
  45. kIPMLowPriority                    EQU        2
  46. kIPMHighPriority                EQU        3
  47. ; typedef Byte                             IPMPriority
  48.  
  49. ;  Values of IPMAccessMode 
  50.  
  51. kIPMAtMark                        EQU        0
  52. kIPMFromStart                    EQU        1
  53. kIPMFromLEOM                    EQU        2
  54. kIPMFromMark                    EQU        3
  55. ; typedef unsigned short                 IPMAccessMode
  56.  
  57.  
  58. kIPMUpdateMsgBit                EQU        4
  59. kIPMNewMsgBit                    EQU        5
  60. kIPMDeleteMsgBit                EQU        6
  61. ;  Values of IPMNotificationType 
  62.  
  63. kIPMUpdateMsgMask                EQU        $10
  64. kIPMNewMsgMask                    EQU        $20
  65. kIPMDeleteMsgMask                EQU        $40
  66. ; typedef Byte                             IPMNotificationType
  67.  
  68. ;  Values of IPMSenderTag 
  69.  
  70. kIPMSenderRStringTag            EQU        0
  71. kIPMSenderRecordIDTag            EQU        1
  72. ; typedef unsigned short                 IPMSenderTag
  73.  
  74.  
  75. kIPMFromDistListBit                EQU        0
  76. kIPMDummyRecBit                    EQU        1
  77. kIPMFeedbackRecBit                EQU        2                    ; should be redirected to feedback queue 
  78. kIPMReporterRecBit                EQU        3                    ; should be redirected to reporter original queue 
  79. kIPMBCCRecBit                    EQU        4                    ; this recipient is blind to all recipients of message 
  80. ;  Values of OCERecipientOffsetFlags 
  81.  
  82. kIPMFromDistListMask            EQU        $01
  83. kIPMDummyRecMask                EQU        $02
  84. kIPMFeedbackRecMask                EQU        $04
  85. kIPMReporterRecMask                EQU        $08
  86. kIPMBCCRecMask                    EQU        $10
  87. ; typedef Byte                             OCERecipientOffsetFlags
  88.  
  89. OCECreatorType            RECORD 0
  90. msgCreator                 ds.l    1                ; offset: $0 (0)
  91. msgType                     ds.l    1                ; offset: $4 (4)
  92. sizeof                     EQU *                    ; size:   $8 (8)
  93.                         ENDR
  94.  
  95. kIPMTypeWildCard                EQU        'ipmw'
  96. kIPMFamilyUnspecified            EQU        0
  97. kIPMFamilyWildCard                EQU        $3F3F3F3F            ; '????' * well known signature 
  98. kIPMSignature                    EQU        'ipms'                ; base type * well known message types 
  99. kIPMReportNotify                EQU        'rptn'                ; routing feedback * well known message block types 
  100. kIPMEnclosedMsgType                EQU        'emsg'                ; enclosed (nested) message 
  101. kIPMReportInfo                    EQU        'rpti'                ; recipient information 
  102. kIPMDigitalSignature            EQU        'dsig'                ; digital signature 
  103. ;  Values of IPMMsgFormat 
  104.  
  105. kIPMOSFormatType                EQU        1
  106. kIPMStringFormatType            EQU        2
  107. ; typedef unsigned short                 IPMMsgFormat
  108.  
  109. IPMStringMsgType        RECORD 0
  110. f                         ds        Str32
  111. sizeof                     EQU *                    ; size:   $21 (33)
  112.                         ENDR
  113.  
  114.  
  115. TheType                    RECORD 0
  116. msgOSType                 ds        OCECreatorType ; offset: $0 (0)
  117.                          ORG 0
  118. msgStrType                 ds        IPMStringMsgType ; offset: $0 (0)
  119.                          ORG 34
  120. sizeof                     EQU *                    ; size:   $22 (34)
  121.                         ENDR
  122. IPMMsgType                RECORD 0
  123. format                     ds.w    1                ; offset: $0 (0)        ;  IPMMsgFormat
  124. theType                     ds        TheType            ; offset: $2 (2)
  125. sizeof                     EQU *                    ; size:   $24 (36)
  126.                         ENDR
  127. ; 
  128. ;Following are the known extension values for IPM addresses handled by Apple.
  129. ;We define the definition of the entn extension below.
  130. ;
  131.  
  132.  
  133. kOCEalanXtn                        EQU        'alan'
  134. kOCEentnXtn                        EQU        'entn'                ; entn = entity name (aka DSSpec) 
  135. kOCEaphnXtn                        EQU        'aphn'
  136. ; 
  137. ;Following are the specific definitions for the extension for the standard
  138. ;OCEMail 'entn' addresses.  [Note, the actual extension is formatted as in
  139. ;IPMEntityNameExtension.]
  140. ;
  141.  
  142. ;  entn extension forms 
  143.  
  144. kOCEAddrXtn                        EQU        'addr'
  145. kOCEQnamXtn                        EQU        'qnam'
  146. kOCEAttrXtn                        EQU        'attr'                ; an attribute specification 
  147. kOCESpAtXtn                        EQU        'spat'                ; specific attribute 
  148. ; 
  149. ;Following are the specific definitions for standard
  150. ;OCEMail 'aphn' extension value.  
  151. ;
  152. ;All RStrings here are packed (e.g. truncated to length) and even padded (e.g.
  153. ;if length odd, then a pad byte (zero) should be introduced before the next field).
  154. ;
  155. ;The extension value is in the packed form of the following structure:
  156. ;    RString        phoneNumber;
  157. ;    RString        modemType;
  158. ;    Str32        queueuName;
  159. ;
  160. ;The body of phoneNumber compound RString is in the packed form of the following structure:
  161. ;    short         subType;
  162. ;    RString     countryCode;                // used when subType == kOCEUseHandyDial
  163. ;    RString        areaCode;                    // used when subType == kOCEUseHandyDial
  164. ;    RString        phone;                        // used when subType == kOCEUseHandyDial
  165. ;    RString        postFix;                    // used when subType == kOCEUseHandyDial
  166. ;    RString        nonHandyDialString;            // used when subType == kOCEDontUseHandyDial
  167. ;
  168.  
  169. ;  phoneNumber sub type constants 
  170.  
  171. kOCEUseHandyDial                EQU        1
  172. kOCEDontUseHandyDial            EQU        2
  173. ;  FORMAT OF A PACKED FORM RECIPIENT 
  174. ProtoOCEPackedRecipient    RECORD 0
  175. dataLength                 ds.w    1                ; offset: $0 (0)
  176. sizeof                     EQU *                    ; size:   $2 (2)
  177.                         ENDR
  178.  
  179. kOCEPackedRecipientMaxBytes        EQU        4094
  180. OCEPackedRecipient        RECORD 0
  181. dataLength                 ds.w    1                ; offset: $0 (0)
  182. data                     ds.b    4094            ; offset: $2 (2)
  183. sizeof                     EQU *                    ; size:   $1000 (4096)
  184.                         ENDR
  185. IPMEntnQueueExtension    RECORD 0
  186. queueName                 ds        Str32            ; offset: $0 (0)
  187.                          ORG 34
  188. sizeof                     EQU *                    ; size:   $22 (34)
  189.                         ENDR
  190. ;  kOCEAttrXtn 
  191. IPMEntnAttributeExtension RECORD 0
  192. attributeName             ds        AttributeType    ; offset: $0 (0)
  193. sizeof                     EQU *                    ; size:   $24 (36)
  194.                         ENDR
  195. ;  kOCESpAtXtn 
  196. IPMEntnSpecificAttributeExtension RECORD 0
  197. attributeCreationID         ds        AttributeCreationID ; offset: $0 (0)
  198. attributeName             ds        AttributeType    ; offset: $8 (8)
  199. sizeof                     EQU *                    ; size:   $2C (44)
  200.                         ENDR
  201. ;  All IPM entn extensions fit within the following 
  202. IPMEntityNameExtension    RECORD 0
  203. subExtensionType         ds.l    1                ; offset: $0 (0)
  204. specificAttribute         ds        IPMEntnSpecificAttributeExtension ; offset: $4 (4)
  205.                          ORG 4
  206. attribute                 ds        IPMEntnAttributeExtension ; offset: $4 (4)
  207.                          ORG 4
  208. queue                     ds        IPMEntnQueueExtension ; offset: $4 (4)
  209.                          ORG 48
  210. sizeof                     EQU *                    ; size:   $30 (48)
  211.                         ENDR
  212. ;  addresses with kIPMNBPXtn should specify this nbp type 
  213. IPMMsgID                RECORD 0
  214. id                         ds.l    4                ; offset: $0 (0)
  215. sizeof                     EQU *                    ; size:   $10 (16)
  216.                         ENDR
  217.  
  218. ;  Values of IPMHeaderSelector 
  219.  
  220. kIPMTOC                            EQU        0
  221. kIPMSender                        EQU        1
  222. kIPMProcessHint                    EQU        2
  223. kIPMMessageTitle                EQU        3
  224. kIPMMessageType                    EQU        4
  225. kIPMFixedInfo                    EQU        7
  226. ; typedef Byte                             IPMHeaderSelector
  227.  
  228. TheSender                RECORD 0
  229. rString                     ds        RString            ; offset: $0 (0)
  230.                          ORG 0
  231. rid                         ds        PackedRecordID ; offset: $0 (0)
  232. sizeof                     EQU *                    ; size:   $722 (1826)
  233.                         ENDR
  234. IPMSender                RECORD 0
  235. sendTag                     ds.w    1                ; offset: $0 (0)
  236. theSender                 ds        TheSender        ; offset: $2 (2)
  237. sizeof                     EQU *                    ; size:   $724 (1828)
  238.                         ENDR
  239. ; *****************************************************************************
  240. ;  Definitions specific to OCEMessaging 
  241. ; typedef unsigned long                 IPMContextRef
  242.  
  243. ; typedef unsigned long                 IPMQueueRef
  244.  
  245. ; typedef unsigned long                 IPMMsgRef
  246.  
  247. ; typedef unsigned long                 IPMSeqNum
  248.  
  249. IPMProcHint                RECORD 0
  250. f                         ds        Str32
  251. sizeof                     EQU *                    ; size:   $21 (33)
  252.                         ENDR
  253.  
  254.  
  255. IPMQueueName            RECORD 0
  256. f                         ds        Str32
  257. sizeof                     EQU *                    ; size:   $21 (33)
  258.                         ENDR
  259.  
  260.  
  261. IPMFixedHdrInfo            RECORD 0
  262. version                     ds.w    1                ; offset: $0 (0)
  263. authenticated             ds.b    1                ; offset: $2 (2)
  264. signatureEnclosed         ds.b    1                ; offset: $3 (3)        ;   digital signature enclosed 
  265. msgSize                     ds.l    1                ; offset: $4 (4)
  266. notification             ds.b    1                ; offset: $8 (8)
  267. priority                 ds.b    1                ; offset: $9 (9)
  268. blockCount                 ds.w    1                ; offset: $A (10)
  269. originalRcptCount         ds.w    1                ; offset: $C (12)        ;         original number of recipients 
  270. refCon                     ds.l    1                ; offset: $E (14)        ;         Client defined data 
  271. reserved                 ds.w    1                ; offset: $12 (18)
  272. creationTime             ds.l    1                ; offset: $14 (20)        ;         Time when it was created 
  273. msgID                     ds        IPMMsgID        ; offset: $18 (24)
  274. family                     ds.l    1                ; offset: $28 (40)        ;  family this msg belongs (e.g. mail) 
  275. sizeof                     EQU *                    ; size:   $2C (44)
  276.                         ENDR
  277.  
  278. kIPMDeliveryNotificationBit        EQU        0
  279. kIPMNonDeliveryNotificationBit    EQU        1
  280. kIPMEncloseOriginalBit            EQU        2
  281. kIPMSummaryReportBit            EQU        3                    ; modify enclose original to only on error 
  282. kIPMOriginalOnlyOnErrorBit        EQU        4
  283.  
  284. kIPMNoNotificationMask            EQU        $00
  285. kIPMDeliveryNotificationMask    EQU        $01
  286. kIPMNonDeliveryNotificationMask    EQU        $02
  287. kIPMDontEncloseOriginalMask        EQU        $00
  288. kIPMEncloseOriginalMask            EQU        $04
  289. kIPMImmediateReportMask            EQU        $00
  290. kIPMSummaryReportMask            EQU        $08
  291. kIPMOriginalOnlyOnErrorMask        EQU        $10
  292. kIPMEncloseOriginalOnErrorMask    EQU        $14
  293. ;  standard Non delivery codes 
  294.  
  295. kIPMNoSuchRecipient                EQU        $0001
  296. kIPMRecipientMalformed            EQU        $0002
  297. kIPMRecipientAmbiguous            EQU        $0003
  298. kIPMRecipientAccessDenied        EQU        $0004
  299. kIPMGroupExpansionProblem        EQU        $0005
  300. kIPMMsgUnreadable                EQU        $0006
  301. kIPMMsgExpired                    EQU        $0007
  302. kIPMMsgNoTranslatableContent    EQU        $0008
  303. kIPMRecipientReqStdCont            EQU        $0009
  304. kIPMRecipientReqSnapShot        EQU        $000A
  305. kIPMNoTransferDiskFull            EQU        $000B
  306. kIPMNoTransferMsgRejectedbyDest    EQU        $000C
  307. kIPMNoTransferMsgTooLarge        EQU        $000D
  308. ; ************************************************************************
  309. ; 
  310. ;This is the structure that will be returned by enumerate and getmsginfo
  311. ;This definition is just to give you a template, the position of msgType
  312. ;is variable since this is a packed structure.  procHint and msgType are
  313. ;packed and even length padded.
  314. ;
  315. ;* master message info 
  316.  
  317. IPMMsgInfo                RECORD 0
  318. sequenceNum                 ds.l    1                ; offset: $0 (0)
  319. userData                 ds.l    1                ; offset: $4 (4)
  320. respIndex                 ds.w    1                ; offset: $8 (8)
  321. padByte                     ds.b    1                ; offset: $A (10)
  322. priority                 ds.b    1                ; offset: $B (11)
  323. msgSize                     ds.l    1                ; offset: $C (12)
  324. originalRcptCount         ds.w    1                ; offset: $10 (16)
  325. reserved                 ds.w    1                ; offset: $12 (18)
  326. creationTime             ds.l    1                ; offset: $14 (20)
  327. msgID                     ds        IPMMsgID        ; offset: $18 (24)
  328. family                     ds.l    1                ; offset: $28 (40)        ;  family this msg belongs (e.g. mail) 
  329. procHint                 ds        IPMProcHint        ; offset: $2C (44)
  330. filler2                     ds.b    1                ; offset: $4D (77)
  331. msgType                     ds        IPMMsgType        ; offset: $4E (78)
  332. sizeof                     EQU *                    ; size:   $72 (114)
  333.                         ENDR
  334. IPMBlockType            RECORD 0
  335. f                         ds        OCECreatorType
  336. sizeof                     EQU *                    ; size:   $8 (8)
  337.                         ENDR
  338.  
  339.  
  340. IPMTOC                    RECORD 0
  341. blockType                 ds        IPMBlockType    ; offset: $0 (0)
  342. blockOffset                 ds.l    1                ; offset: $8 (8)
  343. blockSize                 ds.l    1                ; offset: $C (12)
  344. blockRefCon                 ds.l    1                ; offset: $10 (16)
  345. sizeof                     EQU *                    ; size:   $14 (20)
  346.                         ENDR
  347. ; 
  348. ;The following structure is just to describe the layout of the SingleFilter.
  349. ;Each field should be packed and word aligned when passed to the IPM ToolBox.
  350. ;
  351.  
  352. IPMSingleFilter            RECORD 0
  353. priority                 ds.b    1                ; offset: $0 (0)
  354. padByte                     ds.b    1                ; offset: $1 (1)
  355. family                     ds.l    1                ; offset: $2 (2)        ;  family this msg belongs (e.g. mail), '????' for all 
  356. script                     ds.w    1                ; offset: $6 (6)        ;  Language Identifier 
  357. hint                     ds        IPMProcHint        ; offset: $8 (8)
  358. filler2                     ds.b    1                ; offset: $29 (41)
  359. msgType                     ds        IPMMsgType        ; offset: $2A (42)
  360. sizeof                     EQU *                    ; size:   $4E (78)
  361.                         ENDR
  362. IPMFilter                RECORD 0
  363. count                     ds.w    1                ; offset: $0 (0)
  364. sFilters                 ds        IPMSingleFilter ; offset: $2 (2) <-- really an array of length one
  365. sizeof                     EQU *                    ; size:   $50 (80)
  366.                         ENDR
  367. ; *************************************************************************
  368. ;Following structures define the “start” of a recipient report block and the
  369. ;elements of the array respectively.
  370. ;
  371.  
  372. IPMReportBlockHeader    RECORD 0
  373. msgID                     ds        IPMMsgID        ; offset: $0 (0)        ;  message id of the original 
  374. creationTime             ds.l    1                ; offset: $10 (16)        ;  creation time of the report 
  375. sizeof                     EQU *                    ; size:   $14 (20)
  376.                         ENDR
  377. OCERecipientReport        RECORD 0
  378. rcptIndex                 ds.w    1                ; offset: $0 (0)        ;  index of recipient in original message 
  379. result                     ds.w    1                ; offset: $2 (2)        ;  result of sending letter to this recipient
  380. sizeof                     EQU *                    ; size:   $4 (4)
  381.                         ENDR
  382. ; ************************************************************************
  383.  
  384.  
  385. ; typedef IPMParamBlock *                IPMParamBlockPtr
  386.  
  387. IPMOpenContextPB        RECORD 0
  388. qLink                     ds.l    1                ; offset: $0 (0)
  389. reservedH1                 ds.l    1                ; offset: $4 (4)
  390. reservedH2                 ds.l    1                ; offset: $8 (8)
  391. ioCompletion             ds.l    1                ; offset: $C (12)
  392. ioResult                 ds.w    1                ; offset: $10 (16)
  393. saveA5                     ds.l    1                ; offset: $12 (18)
  394. reqCode                     ds.w    1                ; offset: $16 (22)
  395. contextRef                 ds.l    1                ; offset: $18 (24)        ;  <--  Context reference to be used in further calls
  396. sizeof                     EQU *                    ; size:   $1C (28)
  397.                         ENDR
  398. IPMCloseContextPB        RECORD 0
  399. f                         ds        IPMOpenContextPB
  400. sizeof                     EQU *                    ; size:   $1C (28)
  401.                         ENDR
  402.  
  403.  
  404. IPMCreateQueuePB        RECORD 0
  405. qLink                     ds.l    1                ; offset: $0 (0)
  406. reservedH1                 ds.l    1                ; offset: $4 (4)
  407. reservedH2                 ds.l    1                ; offset: $8 (8)
  408. ioCompletion             ds.l    1                ; offset: $C (12)
  409. ioResult                 ds.w    1                ; offset: $10 (16)
  410. saveA5                     ds.l    1                ; offset: $12 (18)
  411. reqCode                     ds.w    1                ; offset: $16 (22)
  412. filler1                     ds.l    1                ; offset: $18 (24)
  413. queue                     ds.l    1                ; offset: $1C (28)
  414. identity                 ds.l    1                ; offset: $20 (32)        ;  used only if queue is remote 
  415. owner                     ds.l    1                ; offset: $24 (36)        ;  used only if queue is remote 
  416. sizeof                     EQU *                    ; size:   $28 (40)
  417.                         ENDR
  418. ;  For createqueue and deletequeue only queue and identity are used 
  419. IPMDeleteQueuePB        RECORD 0
  420. f                         ds        IPMCreateQueuePB
  421. sizeof                     EQU *                    ; size:   $28 (40)
  422.                         ENDR
  423.  
  424.  
  425. IPMOpenQueuePB            RECORD 0
  426. qLink                     ds.l    1                ; offset: $0 (0)
  427. reservedH1                 ds.l    1                ; offset: $4 (4)
  428. reservedH2                 ds.l    1                ; offset: $8 (8)
  429. ioCompletion             ds.l    1                ; offset: $C (12)
  430. ioResult                 ds.w    1                ; offset: $10 (16)
  431. saveA5                     ds.l    1                ; offset: $12 (18)
  432. reqCode                     ds.w    1                ; offset: $16 (22)
  433. contextRef                 ds.l    1                ; offset: $18 (24)
  434. queue                     ds.l    1                ; offset: $1C (28)
  435. identity                 ds.l    1                ; offset: $20 (32)
  436. filter                     ds.l    1                ; offset: $24 (36)
  437. newQueueRef                 ds.l    1                ; offset: $28 (40)
  438. notificationProc         ds.l    1                ; offset: $2C (44)
  439. userData                 ds.l    1                ; offset: $30 (48)
  440. noteType                 ds.b    1                ; offset: $34 (52)
  441. padByte                     ds.b    1                ; offset: $35 (53)
  442. reserved                 ds.l    1                ; offset: $36 (54)
  443. reserved2                 ds.l    1                ; offset: $3A (58)
  444. sizeof                     EQU *                    ; size:   $3E (62)
  445.                         ENDR
  446. IPMCloseQueuePB            RECORD 0
  447. qLink                     ds.l    1                ; offset: $0 (0)
  448. reservedH1                 ds.l    1                ; offset: $4 (4)
  449. reservedH2                 ds.l    1                ; offset: $8 (8)
  450. ioCompletion             ds.l    1                ; offset: $C (12)
  451. ioResult                 ds.w    1                ; offset: $10 (16)
  452. saveA5                     ds.l    1                ; offset: $12 (18)
  453. reqCode                     ds.w    1                ; offset: $16 (22)
  454. queueRef                 ds.l    1                ; offset: $18 (24)
  455. sizeof                     EQU *                    ; size:   $1C (28)
  456.                         ENDR
  457. IPMEnumerateQueuePB        RECORD 0
  458. qLink                     ds.l    1                ; offset: $0 (0)
  459. reservedH1                 ds.l    1                ; offset: $4 (4)
  460. reservedH2                 ds.l    1                ; offset: $8 (8)
  461. ioCompletion             ds.l    1                ; offset: $C (12)
  462. ioResult                 ds.w    1                ; offset: $10 (16)
  463. saveA5                     ds.l    1                ; offset: $12 (18)
  464. reqCode                     ds.w    1                ; offset: $16 (22)
  465. queueRef                 ds.l    1                ; offset: $18 (24)
  466. startSeqNum                 ds.l    1                ; offset: $1C (28)
  467. getProcHint                 ds.b    1                ; offset: $20 (32)
  468. getMsgType                 ds.b    1                ; offset: $21 (33)
  469. filler                     ds.w    1                ; offset: $22 (34)
  470. filter                     ds.l    1                ; offset: $24 (36)
  471. numToGet                 ds.w    1                ; offset: $28 (40)
  472. numGotten                 ds.w    1                ; offset: $2A (42)
  473. enumCount                 ds.l    1                ; offset: $2C (44)
  474. enumBuffer                 ds.l    1                ; offset: $30 (48)        ;  will be packed array of IPMMsgInfo 
  475. actEnumCount             ds.l    1                ; offset: $34 (52)
  476. sizeof                     EQU *                    ; size:   $38 (56)
  477.                         ENDR
  478. IPMChangeQueueFilterPB    RECORD 0
  479. f                         ds        IPMEnumerateQueuePB
  480. sizeof                     EQU *                    ; size:   $38 (56)
  481.                         ENDR
  482.  
  483.  
  484. IPMDeleteMsgRangePB        RECORD 0
  485. qLink                     ds.l    1                ; offset: $0 (0)
  486. reservedH1                 ds.l    1                ; offset: $4 (4)
  487. reservedH2                 ds.l    1                ; offset: $8 (8)
  488. ioCompletion             ds.l    1                ; offset: $C (12)
  489. ioResult                 ds.w    1                ; offset: $10 (16)
  490. saveA5                     ds.l    1                ; offset: $12 (18)
  491. reqCode                     ds.w    1                ; offset: $16 (22)
  492. queueRef                 ds.l    1                ; offset: $18 (24)
  493. startSeqNum                 ds.l    1                ; offset: $1C (28)
  494. endSeqNum                 ds.l    1                ; offset: $20 (32)
  495. lastSeqNum                 ds.l    1                ; offset: $24 (36)
  496. sizeof                     EQU *                    ; size:   $28 (40)
  497.                         ENDR
  498.  
  499. IPMOpenMsgPB            RECORD 0
  500. qLink                     ds.l    1                ; offset: $0 (0)
  501. reservedH1                 ds.l    1                ; offset: $4 (4)
  502. reservedH2                 ds.l    1                ; offset: $8 (8)
  503. ioCompletion             ds.l    1                ; offset: $C (12)
  504. ioResult                 ds.w    1                ; offset: $10 (16)
  505. saveA5                     ds.l    1                ; offset: $12 (18)
  506. reqCode                     ds.w    1                ; offset: $16 (22)
  507. queueRef                 ds.l    1                ; offset: $18 (24)
  508. sequenceNum                 ds.l    1                ; offset: $1C (28)
  509. newMsgRef                 ds.l    1                ; offset: $20 (32)
  510. actualSeqNum             ds.l    1                ; offset: $24 (36)
  511. exactMatch                 ds.b    1                ; offset: $28 (40)
  512. padByte                     ds.b    1                ; offset: $29 (41)
  513. reserved                 ds.l    1                ; offset: $2A (42)
  514. sizeof                     EQU *                    ; size:   $2E (46)
  515.                         ENDR
  516.  
  517. IPMOpenHFSMsgPB            RECORD 0
  518. qLink                     ds.l    1                ; offset: $0 (0)
  519. reservedH1                 ds.l    1                ; offset: $4 (4)
  520. reservedH2                 ds.l    1                ; offset: $8 (8)
  521. ioCompletion             ds.l    1                ; offset: $C (12)
  522. ioResult                 ds.w    1                ; offset: $10 (16)
  523. saveA5                     ds.l    1                ; offset: $12 (18)
  524. reqCode                     ds.w    1                ; offset: $16 (22)
  525. hfsPath                     ds.l    1                ; offset: $18 (24)
  526. filler                     ds.l    1                ; offset: $1C (28)
  527. newMsgRef                 ds.l    1                ; offset: $20 (32)
  528. filler2                     ds.l    1                ; offset: $24 (36)
  529. filler3                     ds.b    1                ; offset: $28 (40)
  530. filler4                     ds.b    1                ; offset: $29 (41)
  531. reserved                 ds.l    1                ; offset: $2A (42)
  532. sizeof                     EQU *                    ; size:   $2E (46)
  533.                         ENDR
  534.  
  535. IPMOpenBlockAsMsgPB        RECORD 0
  536. qLink                     ds.l    1                ; offset: $0 (0)
  537. reservedH1                 ds.l    1                ; offset: $4 (4)
  538. reservedH2                 ds.l    1                ; offset: $8 (8)
  539. ioCompletion             ds.l    1                ; offset: $C (12)
  540. ioResult                 ds.w    1                ; offset: $10 (16)
  541. saveA5                     ds.l    1                ; offset: $12 (18)
  542. reqCode                     ds.w    1                ; offset: $16 (22)
  543. msgRef                     ds.l    1                ; offset: $18 (24)
  544. filler                     ds.l    1                ; offset: $1C (28)
  545. newMsgRef                 ds.l    1                ; offset: $20 (32)
  546. filler2                     ds.w    7                ; offset: $24 (36)
  547. blockIndex                 ds.w    1                ; offset: $32 (50)
  548. sizeof                     EQU *                    ; size:   $34 (52)
  549.                         ENDR
  550.  
  551. IPMCloseMsgPB            RECORD 0
  552. qLink                     ds.l    1                ; offset: $0 (0)
  553. reservedH1                 ds.l    1                ; offset: $4 (4)
  554. reservedH2                 ds.l    1                ; offset: $8 (8)
  555. ioCompletion             ds.l    1                ; offset: $C (12)
  556. ioResult                 ds.w    1                ; offset: $10 (16)
  557. saveA5                     ds.l    1                ; offset: $12 (18)
  558. reqCode                     ds.w    1                ; offset: $16 (22)
  559. msgRef                     ds.l    1                ; offset: $18 (24)
  560. deleteMsg                 ds.b    1                ; offset: $1C (28)
  561. filler1                     ds.b    1                ; offset: $1D (29)
  562. sizeof                     EQU *                    ; size:   $1E (30)
  563.                         ENDR
  564.  
  565. IPMGetMsgInfoPB            RECORD 0
  566. qLink                     ds.l    1                ; offset: $0 (0)
  567. reservedH1                 ds.l    1                ; offset: $4 (4)
  568. reservedH2                 ds.l    1                ; offset: $8 (8)
  569. ioCompletion             ds.l    1                ; offset: $C (12)
  570. ioResult                 ds.w    1                ; offset: $10 (16)
  571. saveA5                     ds.l    1                ; offset: $12 (18)
  572. reqCode                     ds.w    1                ; offset: $16 (22)
  573. msgRef                     ds.l    1                ; offset: $18 (24)
  574. info                     ds.l    1                ; offset: $1C (28)
  575. sizeof                     EQU *                    ; size:   $20 (32)
  576.                         ENDR
  577.  
  578. IPMReadHeaderPB            RECORD 0
  579. qLink                     ds.l    1                ; offset: $0 (0)
  580. reservedH1                 ds.l    1                ; offset: $4 (4)
  581. reservedH2                 ds.l    1                ; offset: $8 (8)
  582. ioCompletion             ds.l    1                ; offset: $C (12)
  583. ioResult                 ds.w    1                ; offset: $10 (16)
  584. saveA5                     ds.l    1                ; offset: $12 (18)
  585. reqCode                     ds.w    1                ; offset: $16 (22)
  586. msgRef                     ds.l    1                ; offset: $18 (24)
  587. fieldSelector             ds.w    1                ; offset: $1C (28)
  588. offset                     ds.l    1                ; offset: $1E (30)
  589. count                     ds.l    1                ; offset: $22 (34)
  590. buffer                     ds.l    1                ; offset: $26 (38)
  591. actualCount                 ds.l    1                ; offset: $2A (42)
  592. filler                     ds.w    1                ; offset: $2E (46)
  593. remaining                 ds.l    1                ; offset: $30 (48)
  594. sizeof                     EQU *                    ; size:   $34 (52)
  595.                         ENDR
  596.  
  597. IPMReadRecipientPB        RECORD 0
  598. qLink                     ds.l    1                ; offset: $0 (0)
  599. reservedH1                 ds.l    1                ; offset: $4 (4)
  600. reservedH2                 ds.l    1                ; offset: $8 (8)
  601. ioCompletion             ds.l    1                ; offset: $C (12)
  602. ioResult                 ds.w    1                ; offset: $10 (16)
  603. saveA5                     ds.l    1                ; offset: $12 (18)
  604. reqCode                     ds.w    1                ; offset: $16 (22)
  605. msgRef                     ds.l    1                ; offset: $18 (24)
  606. rcptIndex                 ds.w    1                ; offset: $1C (28)
  607. offset                     ds.l    1                ; offset: $1E (30)
  608. count                     ds.l    1                ; offset: $22 (34)
  609. buffer                     ds.l    1                ; offset: $26 (38)
  610. actualCount                 ds.l    1                ; offset: $2A (42)
  611. reserved                 ds.w    1                ; offset: $2E (46)        ;  must be zero 
  612. remaining                 ds.l    1                ; offset: $30 (48)
  613. originalIndex             ds.w    1                ; offset: $34 (52)
  614. recipientOffsetFlags     ds.b    1                ; offset: $36 (54)
  615. filler1                     ds.b    1                ; offset: $37 (55)
  616. sizeof                     EQU *                    ; size:   $38 (56)
  617.                         ENDR
  618.  
  619. ; 
  620. ;replyQueue works like recipient. [can no longer read it via ReadHeader]
  621. ;OriginalIndex is meaningless, rcptFlags are used seperately and there are
  622. ;currently none defined.
  623. ;
  624.  
  625. IPMReadReplyQueuePB        RECORD 0
  626. f                         ds        IPMReadRecipientPB
  627. sizeof                     EQU *                    ; size:   $38 (56)
  628.                         ENDR
  629.  
  630.  
  631. IPMGetBlkIndexPB        RECORD 0
  632. qLink                     ds.l    1                ; offset: $0 (0)
  633. reservedH1                 ds.l    1                ; offset: $4 (4)
  634. reservedH2                 ds.l    1                ; offset: $8 (8)
  635. ioCompletion             ds.l    1                ; offset: $C (12)
  636. ioResult                 ds.w    1                ; offset: $10 (16)
  637. saveA5                     ds.l    1                ; offset: $12 (18)
  638. reqCode                     ds.w    1                ; offset: $16 (22)
  639. msgRef                     ds.l    1                ; offset: $18 (24)
  640. blockType                 ds        IPMBlockType    ; offset: $1C (28)
  641. index                     ds.w    1                ; offset: $24 (36)
  642. startingFrom             ds.w    1                ; offset: $26 (38)
  643. actualBlockType             ds        IPMBlockType    ; offset: $28 (40)
  644. actualBlockIndex         ds.w    1                ; offset: $30 (48)
  645. sizeof                     EQU *                    ; size:   $32 (50)
  646.                         ENDR
  647.  
  648. IPMReadMsgPB            RECORD 0
  649. qLink                     ds.l    1                ; offset: $0 (0)
  650. reservedH1                 ds.l    1                ; offset: $4 (4)
  651. reservedH2                 ds.l    1                ; offset: $8 (8)
  652. ioCompletion             ds.l    1                ; offset: $C (12)
  653. ioResult                 ds.w    1                ; offset: $10 (16)
  654. saveA5                     ds.l    1                ; offset: $12 (18)
  655. reqCode                     ds.w    1                ; offset: $16 (22)
  656. msgRef                     ds.l    1                ; offset: $18 (24)
  657. mode                     ds.w    1                ; offset: $1C (28)
  658. offset                     ds.l    1                ; offset: $1E (30)
  659. count                     ds.l    1                ; offset: $22 (34)
  660. buffer                     ds.l    1                ; offset: $26 (38)
  661. actualCount                 ds.l    1                ; offset: $2A (42)
  662. blockIndex                 ds.w    1                ; offset: $2E (46)
  663. remaining                 ds.l    1                ; offset: $30 (48)
  664. sizeof                     EQU *                    ; size:   $34 (52)
  665.                         ENDR
  666. IPMVerifySignaturePB    RECORD 0
  667. qLink                     ds.l    1                ; offset: $0 (0)
  668. reservedH1                 ds.l    1                ; offset: $4 (4)
  669. reservedH2                 ds.l    1                ; offset: $8 (8)
  670. ioCompletion             ds.l    1                ; offset: $C (12)
  671. ioResult                 ds.w    1                ; offset: $10 (16)
  672. saveA5                     ds.l    1                ; offset: $12 (18)
  673. reqCode                     ds.w    1                ; offset: $16 (22)
  674. msgRef                     ds.l    1                ; offset: $18 (24)
  675. signatureContext         ds.l    1                ; offset: $1C (28)
  676. sizeof                     EQU *                    ; size:   $20 (32)
  677.                         ENDR
  678. IPMNewMsgPB                RECORD 0
  679. qLink                     ds.l    1                ; offset: $0 (0)
  680. reservedH1                 ds.l    1                ; offset: $4 (4)
  681. reservedH2                 ds.l    1                ; offset: $8 (8)
  682. ioCompletion             ds.l    1                ; offset: $C (12)
  683. ioResult                 ds.w    1                ; offset: $10 (16)
  684. saveA5                     ds.l    1                ; offset: $12 (18)
  685. reqCode                     ds.w    1                ; offset: $16 (22)
  686. filler                     ds.l    1                ; offset: $18 (24)
  687. recipient                 ds.l    1                ; offset: $1C (28)
  688. replyQueue                 ds.l    1                ; offset: $20 (32)
  689. procHint                 ds.l    1                ; offset: $24 (36)
  690. filler2                     ds.w    1                ; offset: $28 (40)
  691. msgType                     ds.l    1                ; offset: $2A (42)
  692. refCon                     ds.l    1                ; offset: $2E (46)
  693. newMsgRef                 ds.l    1                ; offset: $32 (50)
  694. filler3                     ds.w    1                ; offset: $36 (54)
  695. filler4                     ds.l    1                ; offset: $38 (56)
  696. identity                 ds.l    1                ; offset: $3C (60)
  697. sender                     ds.l    1                ; offset: $40 (64)
  698. internalUse                 ds.l    1                ; offset: $44 (68)
  699. internalUse2             ds.l    1                ; offset: $48 (72)
  700. sizeof                     EQU *                    ; size:   $4C (76)
  701.                         ENDR
  702. IPMNewHFSMsgPB            RECORD 0
  703. qLink                     ds.l    1                ; offset: $0 (0)
  704. reservedH1                 ds.l    1                ; offset: $4 (4)
  705. reservedH2                 ds.l    1                ; offset: $8 (8)
  706. ioCompletion             ds.l    1                ; offset: $C (12)
  707. ioResult                 ds.w    1                ; offset: $10 (16)
  708. saveA5                     ds.l    1                ; offset: $12 (18)
  709. reqCode                     ds.w    1                ; offset: $16 (22)
  710. hfsPath                     ds.l    1                ; offset: $18 (24)
  711. recipient                 ds.l    1                ; offset: $1C (28)
  712. replyQueue                 ds.l    1                ; offset: $20 (32)
  713. procHint                 ds.l    1                ; offset: $24 (36)
  714. filler2                     ds.w    1                ; offset: $28 (40)
  715. msgType                     ds.l    1                ; offset: $2A (42)
  716. refCon                     ds.l    1                ; offset: $2E (46)
  717. newMsgRef                 ds.l    1                ; offset: $32 (50)
  718. filler3                     ds.w    1                ; offset: $36 (54)
  719. filler4                     ds.l    1                ; offset: $38 (56)
  720. identity                 ds.l    1                ; offset: $3C (60)
  721. sender                     ds.l    1                ; offset: $40 (64)
  722. internalUse                 ds.l    1                ; offset: $44 (68)
  723. internalUse2             ds.l    1                ; offset: $48 (72)
  724. sizeof                     EQU *                    ; size:   $4C (76)
  725.                         ENDR
  726. IPMNestMsgPB            RECORD 0
  727. qLink                     ds.l    1                ; offset: $0 (0)
  728. reservedH1                 ds.l    1                ; offset: $4 (4)
  729. reservedH2                 ds.l    1                ; offset: $8 (8)
  730. ioCompletion             ds.l    1                ; offset: $C (12)
  731. ioResult                 ds.w    1                ; offset: $10 (16)
  732. saveA5                     ds.l    1                ; offset: $12 (18)
  733. reqCode                     ds.w    1                ; offset: $16 (22)
  734. msgRef                     ds.l    1                ; offset: $18 (24)
  735. filler                     ds.w    9                ; offset: $1C (28)
  736. refCon                     ds.l    1                ; offset: $2E (46)
  737. msgToNest                 ds.l    1                ; offset: $32 (50)
  738. filler2                     ds.w    1                ; offset: $36 (54)
  739. startingOffset             ds.l    1                ; offset: $38 (56)
  740. sizeof                     EQU *                    ; size:   $3C (60)
  741.                         ENDR
  742.  
  743. IPMNewNestedMsgBlockPB    RECORD 0
  744. qLink                     ds.l    1                ; offset: $0 (0)
  745. reservedH1                 ds.l    1                ; offset: $4 (4)
  746. reservedH2                 ds.l    1                ; offset: $8 (8)
  747. ioCompletion             ds.l    1                ; offset: $C (12)
  748. ioResult                 ds.w    1                ; offset: $10 (16)
  749. saveA5                     ds.l    1                ; offset: $12 (18)
  750. reqCode                     ds.w    1                ; offset: $16 (22)
  751. msgRef                     ds.l    1                ; offset: $18 (24)
  752. recipient                 ds.l    1                ; offset: $1C (28)
  753. replyQueue                 ds.l    1                ; offset: $20 (32)
  754. procHint                 ds.l    1                ; offset: $24 (36)
  755. filler1                     ds.w    1                ; offset: $28 (40)
  756. msgType                     ds.l    1                ; offset: $2A (42)
  757. refCon                     ds.l    1                ; offset: $2E (46)
  758. newMsgRef                 ds.l    1                ; offset: $32 (50)
  759. filler2                     ds.w    1                ; offset: $36 (54)
  760. startingOffset             ds.l    1                ; offset: $38 (56)
  761. identity                 ds.l    1                ; offset: $3C (60)
  762. sender                     ds.l    1                ; offset: $40 (64)
  763. internalUse                 ds.l    1                ; offset: $44 (68)
  764. internalUse2             ds.l    1                ; offset: $48 (72)
  765. sizeof                     EQU *                    ; size:   $4C (76)
  766.                         ENDR
  767.  
  768. IPMEndMsgPB                RECORD 0
  769. qLink                     ds.l    1                ; offset: $0 (0)
  770. reservedH1                 ds.l    1                ; offset: $4 (4)
  771. reservedH2                 ds.l    1                ; offset: $8 (8)
  772. ioCompletion             ds.l    1                ; offset: $C (12)
  773. ioResult                 ds.w    1                ; offset: $10 (16)
  774. saveA5                     ds.l    1                ; offset: $12 (18)
  775. reqCode                     ds.w    1                ; offset: $16 (22)
  776. msgRef                     ds.l    1                ; offset: $18 (24)
  777. msgID                     ds        IPMMsgID        ; offset: $1C (28)
  778. msgTitle                 ds.l    1                ; offset: $2C (44)
  779. deliveryNotification     ds.b    1                ; offset: $30 (48)
  780. priority                 ds.b    1                ; offset: $31 (49)
  781. cancel                     ds.b    1                ; offset: $32 (50)
  782. padByte                     ds.b    1                ; offset: $33 (51)
  783. reserved                 ds.l    1                ; offset: $34 (52)
  784. signature                 ds.l    1                ; offset: $38 (56)
  785. signatureSize             ds.l    1                ; offset: $3C (60)
  786. signatureContext         ds.l    1                ; offset: $40 (64)
  787. ;  family this msg belongs (e.g. mail) use kIPMFamilyUnspecified by default 
  788. family                     ds.l    1                ; offset: $44 (68)
  789. sizeof                     EQU *                    ; size:   $48 (72)
  790.                         ENDR
  791.  
  792. IPMAddRecipientPB        RECORD 0
  793. qLink                     ds.l    1                ; offset: $0 (0)
  794. reservedH1                 ds.l    1                ; offset: $4 (4)
  795. reservedH2                 ds.l    1                ; offset: $8 (8)
  796. ioCompletion             ds.l    1                ; offset: $C (12)
  797. ioResult                 ds.w    1                ; offset: $10 (16)
  798. saveA5                     ds.l    1                ; offset: $12 (18)
  799. reqCode                     ds.w    1                ; offset: $16 (22)
  800. msgRef                     ds.l    1                ; offset: $18 (24)
  801. recipient                 ds.l    1                ; offset: $1C (28)
  802. reserved                 ds.l    1                ; offset: $20 (32)
  803. sizeof                     EQU *                    ; size:   $24 (36)
  804.                         ENDR
  805.  
  806. IPMAddReplyQueuePB        RECORD 0
  807. qLink                     ds.l    1                ; offset: $0 (0)
  808. reservedH1                 ds.l    1                ; offset: $4 (4)
  809. reservedH2                 ds.l    1                ; offset: $8 (8)
  810. ioCompletion             ds.l    1                ; offset: $C (12)
  811. ioResult                 ds.w    1                ; offset: $10 (16)
  812. saveA5                     ds.l    1                ; offset: $12 (18)
  813. reqCode                     ds.w    1                ; offset: $16 (22)
  814. msgRef                     ds.l    1                ; offset: $18 (24)
  815. filler                     ds.l    1                ; offset: $1C (28)
  816. replyQueue                 ds.l    1                ; offset: $20 (32)
  817. sizeof                     EQU *                    ; size:   $24 (36)
  818.                         ENDR
  819.  
  820. IPMNewBlockPB            RECORD 0
  821. qLink                     ds.l    1                ; offset: $0 (0)
  822. reservedH1                 ds.l    1                ; offset: $4 (4)
  823. reservedH2                 ds.l    1                ; offset: $8 (8)
  824. ioCompletion             ds.l    1                ; offset: $C (12)
  825. ioResult                 ds.w    1                ; offset: $10 (16)
  826. saveA5                     ds.l    1                ; offset: $12 (18)
  827. reqCode                     ds.w    1                ; offset: $16 (22)
  828. msgRef                     ds.l    1                ; offset: $18 (24)
  829. blockType                 ds        IPMBlockType    ; offset: $1C (28)
  830. filler                     ds.w    5                ; offset: $24 (36)
  831. refCon                     ds.l    1                ; offset: $2E (46)
  832. filler2                     ds.w    3                ; offset: $32 (50)
  833. startingOffset             ds.l    1                ; offset: $38 (56)
  834. sizeof                     EQU *                    ; size:   $3C (60)
  835.                         ENDR
  836.  
  837. IPMWriteMsgPB            RECORD 0
  838. qLink                     ds.l    1                ; offset: $0 (0)
  839. reservedH1                 ds.l    1                ; offset: $4 (4)
  840. reservedH2                 ds.l    1                ; offset: $8 (8)
  841. ioCompletion             ds.l    1                ; offset: $C (12)
  842. ioResult                 ds.w    1                ; offset: $10 (16)
  843. saveA5                     ds.l    1                ; offset: $12 (18)
  844. reqCode                     ds.w    1                ; offset: $16 (22)
  845. msgRef                     ds.l    1                ; offset: $18 (24)
  846. mode                     ds.w    1                ; offset: $1C (28)
  847. offset                     ds.l    1                ; offset: $1E (30)
  848. count                     ds.l    1                ; offset: $22 (34)
  849. buffer                     ds.l    1                ; offset: $26 (38)
  850. actualCount                 ds.l    1                ; offset: $2A (42)
  851. currentBlock             ds.b    1                ; offset: $2E (46)
  852. filler1                     ds.b    1                ; offset: $2F (47)
  853. sizeof                     EQU *                    ; size:   $30 (48)
  854.                         ENDR
  855.  
  856.  
  857. IPMParamBlock            RECORD 0
  858. qLink                     ds.l    1                ; offset: $0 (0)
  859. reservedH1                 ds.l    1                ; offset: $4 (4)
  860. reservedH2                 ds.l    1                ; offset: $8 (8)
  861. ioCompletion             ds.l    1                ; offset: $C (12)
  862. ioResult                 ds.w    1                ; offset: $10 (16)
  863. saveA5                     ds.l    1                ; offset: $12 (18)
  864. reqCode                     ds.w    1                ; offset: $16 (22)
  865.                          ORG 0
  866. openContextPB             ds        IPMOpenContextPB ; offset: $0 (0)
  867.                          ORG 0
  868. closeContextPB             ds        IPMCloseContextPB ; offset: $0 (0)
  869.                          ORG 0
  870. createQueuePB             ds        IPMCreateQueuePB ; offset: $0 (0)
  871.                          ORG 0
  872. deleteQueuePB             ds        IPMDeleteQueuePB ; offset: $0 (0)
  873.                          ORG 0
  874. openQueuePB                 ds        IPMOpenQueuePB ; offset: $0 (0)
  875.                          ORG 0
  876. closeQueuePB             ds        IPMCloseQueuePB ; offset: $0 (0)
  877.                          ORG 0
  878. enumerateQueuePB         ds        IPMEnumerateQueuePB ; offset: $0 (0)
  879.                          ORG 0
  880. changeQueueFilterPB         ds        IPMChangeQueueFilterPB ; offset: $0 (0)
  881.                          ORG 0
  882. deleteMsgRangePB         ds        IPMDeleteMsgRangePB ; offset: $0 (0)
  883.                          ORG 0
  884. openMsgPB                 ds        IPMOpenMsgPB    ; offset: $0 (0)
  885.                          ORG 0
  886. openHFSMsgPB             ds        IPMOpenHFSMsgPB ; offset: $0 (0)
  887.                          ORG 0
  888. openBlockAsMsgPB         ds        IPMOpenBlockAsMsgPB ; offset: $0 (0)
  889.                          ORG 0
  890. closeMsgPB                 ds        IPMCloseMsgPB    ; offset: $0 (0)
  891.                          ORG 0
  892. getMsgInfoPB             ds        IPMGetMsgInfoPB ; offset: $0 (0)
  893.                          ORG 0
  894. readHeaderPB             ds        IPMReadHeaderPB ; offset: $0 (0)
  895.                          ORG 0
  896. readRecipientPB             ds        IPMReadRecipientPB ; offset: $0 (0)
  897.                          ORG 0
  898. readReplyQueuePB         ds        IPMReadReplyQueuePB ; offset: $0 (0)
  899.                          ORG 0
  900. getBlkIndexPB             ds        IPMGetBlkIndexPB ; offset: $0 (0)
  901.                          ORG 0
  902. readMsgPB                 ds        IPMReadMsgPB    ; offset: $0 (0)
  903.                          ORG 0
  904. verifySignaturePB         ds        IPMVerifySignaturePB ; offset: $0 (0)
  905.                          ORG 0
  906. newMsgPB                 ds        IPMNewMsgPB        ; offset: $0 (0)
  907.                          ORG 0
  908. newHFSMsgPB                 ds        IPMNewHFSMsgPB ; offset: $0 (0)
  909.                          ORG 0
  910. nestMsgPB                 ds        IPMNestMsgPB    ; offset: $0 (0)
  911.                          ORG 0
  912. newNestedMsgBlockPB         ds        IPMNewNestedMsgBlockPB ; offset: $0 (0)
  913.                          ORG 0
  914. endMsgPB                 ds        IPMEndMsgPB        ; offset: $0 (0)
  915.                          ORG 0
  916. addRecipientPB             ds        IPMAddRecipientPB ; offset: $0 (0)
  917.                          ORG 0
  918. addReplyQueuePB             ds        IPMAddReplyQueuePB ; offset: $0 (0)
  919.                          ORG 0
  920. newBlockPB                 ds        IPMNewBlockPB    ; offset: $0 (0)
  921.                          ORG 0
  922. writeMsgPB                 ds        IPMWriteMsgPB    ; offset: $0 (0)
  923.                          ORG 76
  924. sizeof                     EQU *                    ; size:   $4C (76)
  925.                         ENDR
  926. ;
  927. ; pascal OSErr IPMOpenContext(IPMParamBlockPtr paramBlock, Boolean async)
  928. ;
  929.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  930.         Macro
  931.         _IPMOpenContext
  932.             move.w              #$0400,-(sp)
  933.             dc.w                $AA5E
  934.         EndM
  935.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  936.         IMPORT_CFM_FUNCTION IPMOpenContext
  937.     ENDIF
  938.  
  939. ;
  940. ; pascal OSErr IPMCloseContext(IPMParamBlockPtr paramBlock, Boolean async)
  941. ;
  942.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  943.         Macro
  944.         _IPMCloseContext
  945.             move.w              #$0401,-(sp)
  946.             dc.w                $AA5E
  947.         EndM
  948.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  949.         IMPORT_CFM_FUNCTION IPMCloseContext
  950.     ENDIF
  951.  
  952. ;
  953. ; pascal OSErr IPMNewMsg(IPMParamBlockPtr paramBlock, Boolean async)
  954. ;
  955.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  956.         Macro
  957.         _IPMNewMsg
  958.             move.w              #$0402,-(sp)
  959.             dc.w                $AA5E
  960.         EndM
  961.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  962.         IMPORT_CFM_FUNCTION IPMNewMsg
  963.     ENDIF
  964.  
  965. ;
  966. ; pascal OSErr IPMNewBlock(IPMParamBlockPtr paramBlock, Boolean async)
  967. ;
  968.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  969.         Macro
  970.         _IPMNewBlock
  971.             move.w              #$0404,-(sp)
  972.             dc.w                $AA5E
  973.         EndM
  974.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  975.         IMPORT_CFM_FUNCTION IPMNewBlock
  976.     ENDIF
  977.  
  978. ;
  979. ; pascal OSErr IPMNewNestedMsgBlock(IPMParamBlockPtr paramBlock, Boolean async)
  980. ;
  981.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  982.         Macro
  983.         _IPMNewNestedMsgBlock
  984.             move.w              #$0405,-(sp)
  985.             dc.w                $AA5E
  986.         EndM
  987.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  988.         IMPORT_CFM_FUNCTION IPMNewNestedMsgBlock
  989.     ENDIF
  990.  
  991. ;
  992. ; pascal OSErr IPMNestMsg(IPMParamBlockPtr paramBlock, Boolean async)
  993. ;
  994.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  995.         Macro
  996.         _IPMNestMsg
  997.             move.w              #$0406,-(sp)
  998.             dc.w                $AA5E
  999.         EndM
  1000.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1001.         IMPORT_CFM_FUNCTION IPMNestMsg
  1002.     ENDIF
  1003.  
  1004. ;
  1005. ; pascal OSErr IPMWriteMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1006. ;
  1007.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1008.         Macro
  1009.         _IPMWriteMsg
  1010.             move.w              #$0407,-(sp)
  1011.             dc.w                $AA5E
  1012.         EndM
  1013.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1014.         IMPORT_CFM_FUNCTION IPMWriteMsg
  1015.     ENDIF
  1016.  
  1017. ;
  1018. ; pascal OSErr IPMEndMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1019. ;
  1020.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1021.         Macro
  1022.         _IPMEndMsg
  1023.             move.w              #$0408,-(sp)
  1024.             dc.w                $AA5E
  1025.         EndM
  1026.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1027.         IMPORT_CFM_FUNCTION IPMEndMsg
  1028.     ENDIF
  1029.  
  1030. ;
  1031. ; pascal OSErr IPMOpenQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1032. ;
  1033.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1034.         Macro
  1035.         _IPMOpenQueue
  1036.             move.w              #$0409,-(sp)
  1037.             dc.w                $AA5E
  1038.         EndM
  1039.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1040.         IMPORT_CFM_FUNCTION IPMOpenQueue
  1041.     ENDIF
  1042.  
  1043. ;
  1044. ; pascal OSErr IPMCloseQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1045. ;
  1046.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1047.         Macro
  1048.         _IPMCloseQueue
  1049.             move.w              #$040A,-(sp)
  1050.             dc.w                $AA5E
  1051.         EndM
  1052.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1053.         IMPORT_CFM_FUNCTION IPMCloseQueue
  1054.     ENDIF
  1055.  
  1056. ;  Always synchronous 
  1057. ;
  1058. ; pascal OSErr IPMVerifySignature(IPMParamBlockPtr paramBlock)
  1059. ;
  1060.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1061.         Macro
  1062.         _IPMVerifySignature
  1063.             moveq               #0,D0
  1064.             move.b              D0,-(sp)
  1065.             move.w              #$0422,-(sp)
  1066.             dc.w                $AA5E
  1067.         EndM
  1068.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1069.         IMPORT_CFM_FUNCTION IPMVerifySignature
  1070.     ENDIF
  1071.  
  1072. ;
  1073. ; pascal OSErr IPMOpenMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1074. ;
  1075.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1076.         Macro
  1077.         _IPMOpenMsg
  1078.             move.w              #$040B,-(sp)
  1079.             dc.w                $AA5E
  1080.         EndM
  1081.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1082.         IMPORT_CFM_FUNCTION IPMOpenMsg
  1083.     ENDIF
  1084.  
  1085. ;
  1086. ; pascal OSErr IPMCloseMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1087. ;
  1088.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1089.         Macro
  1090.         _IPMCloseMsg
  1091.             move.w              #$040C,-(sp)
  1092.             dc.w                $AA5E
  1093.         EndM
  1094.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1095.         IMPORT_CFM_FUNCTION IPMCloseMsg
  1096.     ENDIF
  1097.  
  1098. ;
  1099. ; pascal OSErr IPMReadMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1100. ;
  1101.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1102.         Macro
  1103.         _IPMReadMsg
  1104.             move.w              #$040D,-(sp)
  1105.             dc.w                $AA5E
  1106.         EndM
  1107.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1108.         IMPORT_CFM_FUNCTION IPMReadMsg
  1109.     ENDIF
  1110.  
  1111. ;
  1112. ; pascal OSErr IPMReadHeader(IPMParamBlockPtr paramBlock, Boolean async)
  1113. ;
  1114.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1115.         Macro
  1116.         _IPMReadHeader
  1117.             move.w              #$040E,-(sp)
  1118.             dc.w                $AA5E
  1119.         EndM
  1120.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1121.         IMPORT_CFM_FUNCTION IPMReadHeader
  1122.     ENDIF
  1123.  
  1124. ;
  1125. ; pascal OSErr IPMOpenBlockAsMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1126. ;
  1127.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1128.         Macro
  1129.         _IPMOpenBlockAsMsg
  1130.             move.w              #$040F,-(sp)
  1131.             dc.w                $AA5E
  1132.         EndM
  1133.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1134.         IMPORT_CFM_FUNCTION IPMOpenBlockAsMsg
  1135.     ENDIF
  1136.  
  1137. ;
  1138. ; pascal OSErr IPMNewHFSMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1139. ;
  1140.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1141.         Macro
  1142.         _IPMNewHFSMsg
  1143.             move.w              #$041E,-(sp)
  1144.             dc.w                $AA5E
  1145.         EndM
  1146.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1147.         IMPORT_CFM_FUNCTION IPMNewHFSMsg
  1148.     ENDIF
  1149.  
  1150. ;
  1151. ; pascal OSErr IPMReadRecipient(IPMParamBlockPtr paramBlock, Boolean async)
  1152. ;
  1153.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1154.         Macro
  1155.         _IPMReadRecipient
  1156.             move.w              #$0410,-(sp)
  1157.             dc.w                $AA5E
  1158.         EndM
  1159.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1160.         IMPORT_CFM_FUNCTION IPMReadRecipient
  1161.     ENDIF
  1162.  
  1163. ;
  1164. ; pascal OSErr IPMReadReplyQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1165. ;
  1166.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1167.         Macro
  1168.         _IPMReadReplyQueue
  1169.             move.w              #$0421,-(sp)
  1170.             dc.w                $AA5E
  1171.         EndM
  1172.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1173.         IMPORT_CFM_FUNCTION IPMReadReplyQueue
  1174.     ENDIF
  1175.  
  1176. ;
  1177. ; pascal OSErr IPMCreateQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1178. ;
  1179.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1180.         Macro
  1181.         _IPMCreateQueue
  1182.             move.w              #$0411,-(sp)
  1183.             dc.w                $AA5E
  1184.         EndM
  1185.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1186.         IMPORT_CFM_FUNCTION IPMCreateQueue
  1187.     ENDIF
  1188.  
  1189. ;
  1190. ; pascal OSErr IPMDeleteQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1191. ;
  1192.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1193.         Macro
  1194.         _IPMDeleteQueue
  1195.             move.w              #$0412,-(sp)
  1196.             dc.w                $AA5E
  1197.         EndM
  1198.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1199.         IMPORT_CFM_FUNCTION IPMDeleteQueue
  1200.     ENDIF
  1201.  
  1202. ;
  1203. ; pascal OSErr IPMEnumerateQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1204. ;
  1205.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1206.         Macro
  1207.         _IPMEnumerateQueue
  1208.             move.w              #$0413,-(sp)
  1209.             dc.w                $AA5E
  1210.         EndM
  1211.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1212.         IMPORT_CFM_FUNCTION IPMEnumerateQueue
  1213.     ENDIF
  1214.  
  1215. ;
  1216. ; pascal OSErr IPMChangeQueueFilter(IPMParamBlockPtr paramBlock, Boolean async)
  1217. ;
  1218.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1219.         Macro
  1220.         _IPMChangeQueueFilter
  1221.             move.w              #$0414,-(sp)
  1222.             dc.w                $AA5E
  1223.         EndM
  1224.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1225.         IMPORT_CFM_FUNCTION IPMChangeQueueFilter
  1226.     ENDIF
  1227.  
  1228. ;
  1229. ; pascal OSErr IPMDeleteMsgRange(IPMParamBlockPtr paramBlock, Boolean async)
  1230. ;
  1231.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1232.         Macro
  1233.         _IPMDeleteMsgRange
  1234.             move.w              #$0415,-(sp)
  1235.             dc.w                $AA5E
  1236.         EndM
  1237.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1238.         IMPORT_CFM_FUNCTION IPMDeleteMsgRange
  1239.     ENDIF
  1240.  
  1241. ;
  1242. ; pascal OSErr IPMAddRecipient(IPMParamBlockPtr paramBlock, Boolean async)
  1243. ;
  1244.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1245.         Macro
  1246.         _IPMAddRecipient
  1247.             move.w              #$0403,-(sp)
  1248.             dc.w                $AA5E
  1249.         EndM
  1250.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1251.         IMPORT_CFM_FUNCTION IPMAddRecipient
  1252.     ENDIF
  1253.  
  1254. ;
  1255. ; pascal OSErr IPMAddReplyQueue(IPMParamBlockPtr paramBlock, Boolean async)
  1256. ;
  1257.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1258.         Macro
  1259.         _IPMAddReplyQueue
  1260.             move.w              #$041D,-(sp)
  1261.             dc.w                $AA5E
  1262.         EndM
  1263.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1264.         IMPORT_CFM_FUNCTION IPMAddReplyQueue
  1265.     ENDIF
  1266.  
  1267. ;
  1268. ; pascal OSErr IPMOpenHFSMsg(IPMParamBlockPtr paramBlock, Boolean async)
  1269. ;
  1270.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1271.         Macro
  1272.         _IPMOpenHFSMsg
  1273.             move.w              #$0417,-(sp)
  1274.             dc.w                $AA5E
  1275.         EndM
  1276.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1277.         IMPORT_CFM_FUNCTION IPMOpenHFSMsg
  1278.     ENDIF
  1279.  
  1280. ;
  1281. ; pascal OSErr IPMGetBlkIndex(IPMParamBlockPtr paramBlock, Boolean async)
  1282. ;
  1283.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1284.         Macro
  1285.         _IPMGetBlkIndex
  1286.             move.w              #$0418,-(sp)
  1287.             dc.w                $AA5E
  1288.         EndM
  1289.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1290.         IMPORT_CFM_FUNCTION IPMGetBlkIndex
  1291.     ENDIF
  1292.  
  1293. ;
  1294. ; pascal OSErr IPMGetMsgInfo(IPMParamBlockPtr paramBlock, Boolean async)
  1295. ;
  1296.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1297.         Macro
  1298.         _IPMGetMsgInfo
  1299.             move.w              #$0419,-(sp)
  1300.             dc.w                $AA5E
  1301.         EndM
  1302.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1303.         IMPORT_CFM_FUNCTION IPMGetMsgInfo
  1304.     ENDIF
  1305.  
  1306.  
  1307.  
  1308.     ENDIF ; __OCEMESSAGING__ 
  1309.  
  1310.